<!--#include file="Config.asp" -->
<!--#include file="HeadTop.asp"-->

<%
UserID=session("AnyPIM_userID")
ContactID=int(request("id"))
set rs=server.createobject("adodb.recordset")
If request("id")<>"" then
sql="select top 1 * from Contact_info where id="&ContactID
rs.open sql,conn,1,1
ContactID=int(rs("ID"))
Name=Trim(rs("name"))
sex=int(rs("sex"))
birthmon=int(rs("birthmon"))
birthday=int(rs("birthday"))
remark=Trim(rs("remark"))
rs.close
Else
response.redirect "Index.asp"
End if
%>

<table class="table table-condensed">
<TR>
<TD noWrap vAlign='top'>
<!-- 个人 -->
<table class="table table-condensed">
<tr>
	<td><font size="6" color="0099ff"><%=Name%>,<%=GetSex(sex)%></font></td>
</tr>
</table>

<!-- 个人基本信息 -->
<table class="table table-condensed table-bordered">
<TR bgcolor='#ccff99'>
<td>基本信息&nbsp;&nbsp;[<a href="ContactEdit.asp?id=<%=ContactID%>">编辑修改</a>]</td>
</tr>
<TR bgcolor='#ffffff'>
  <td>生日：<%=birthmon%>月<%=birthday%>日</td>
</tr>

<TR bgcolor='#ffffff'>
  <td>备注：<font color=#993300><%=remark%></font></td>
</tr>
</table>

<!-- 属性信息 -->
<table class="table table-condensed table-bordered">
<TR bgcolor='#ccff99'>
<TD>详细信息</TD>
<TD>内容</TD>
<TD>时间</TD>
</TR>
<FORM METHOD=POST ACTION="ContactSave.asp?ActionType=SaveAddPro&ContactID=<%=ContactID%>">
<TR bgcolor='#f6f6f6'>
<TD><SELECT NAME="ProTypeID">
<%
sql="select * from Contact_propertyType order by ID"
rs.open sql,conn,1,1
for ForUserID=1 to rs.recordcount
%>
<OPTION VALUE="<%=int(RS("id"))%>"><%=int(rs("ID"))%>.<%=Trim(rs("title"))%></option>
<%
rs.moveNext
next
rs.close
%>
</SELECT>
</TD>
<TD><input type="text" NAME="content" size='60'>&nbsp;<INPUT TYPE="submit" value='保存'></TD>
<TD>&nbsp;</TD>
</TR>
</FORM>
<%
SQL="select * from Contact_property where ContactID="&ContactID&" and UserID='"&UserID&"' order by id desc"
rs.open sql,conn,1,1
for ForUserID=1 to rs.recordcount
%>
<TR bgcolor='#ffffff'>
<TD style="border-bottom:#CCCCCC 1px solid;"><%=GetProType(int(RS("ProTypeID")))%></TD>
<TD style="border-bottom:#CCCCCC 1px solid;"><%=RS("content")%></TD>
<TD style="border-bottom:#CCCCCC 1px solid;"><%=RS("DOtime")%></TD>
</TR>
<%
rs.moveNext
next
rs.close
%>
</TABLE>


<!-- 属性信息 -->
</td>
<TD noWrap vAlign='top' width='10'></TD>
<TD noWrap vAlign='top' width='200'>
	<!-- 分组开始 -->
	<!--#include file=IncContactGroup.asp -->
	<!-- 分组结束 -->
</TD>
</TR>
</table>
<!--组显示结束 -->
<!--#include file=Foot.asp -->
